﻿Public Class HopDong

    Private iSoHopDong As Integer
    Private sMaHopDong As String
    Private dNgayKy As Date
    Private dNgayHieuLuc As Date
    Private sNguoiKy As String
    Private sChucVu As String
    Private dGiaTriHD As Decimal
    Private iSoLoaiTien As Integer ''Khóa phụ liên kết với bảng Loại Tiền
    Private iSoDoiTuong As Integer ''Khóa phụ liên kết với bảng Đối tượng
    Private iSoTinhTrangHD As Integer ''Khóa phụ liên kết với bảng Loại Tiền
    Private dNgayKetThuc As Date
    Private sLyDoKetThuc As String
    Private iLoaiHopDong As Integer ''Loại 1 là mua loại 2 là bán

    Public Property SoHopDong() As Integer
        Get
            Return iSoHopDong
        End Get
        Set(ByVal value As Integer)
            iSoHopDong = value
        End Set
    End Property

    Public Property MaHopDong() As String
        Get
            Return sMaHopDong
        End Get
        Set(ByVal value As String)
            sMaHopDong = value
        End Set
    End Property

    Public Property NgayKy() As Date
        Get
            Return dNgayKy
        End Get
        Set(ByVal value As Date)
            dNgayKy = value
        End Set
    End Property

    Public Property NgayHieuLuc() As Date
        Get
            Return dNgayHieuLuc
        End Get
        Set(ByVal value As Date)
            dNgayHieuLuc = value
        End Set
    End Property

    Public Property NguoiKy() As String
        Get
            Return sNguoiKy
        End Get
        Set(ByVal value As String)
            sNguoiKy = value
        End Set
    End Property

    Public Property ChucVu() As String
        Get
            Return sChucVu
        End Get
        Set(ByVal value As String)
            sChucVu = value
        End Set
    End Property

    Public Property GiaTriHD() As Decimal
        Get
            Return dGiaTriHD
        End Get
        Set(ByVal value As Decimal)
            dGiaTriHD = value
        End Set
    End Property

    Public Property SoLoaiTien() As Integer
        Get
            Return iSoLoaiTien
        End Get
        Set(ByVal value As Integer)
            iSoLoaiTien = value
        End Set
    End Property

    Public Property SoDoiTuong() As Integer
        Get
            Return iSoDoiTuong
        End Get
        Set(ByVal value As Integer)
            iSoDoiTuong = value
        End Set
    End Property

    Public Property SoTinhTrangHD() As Integer
        Get
            Return iSoTinhTrangHD
        End Get
        Set(ByVal value As Integer)
            iSoTinhTrangHD = value
        End Set
    End Property

    Public Property NgayKetThuc() As Date
        Get
            Return dNgayKetThuc
        End Get
        Set(ByVal value As Date)
            dNgayKetThuc = value
        End Set
    End Property

    Public Property LyDoKetThuc() As String
        Get
            Return sLyDoKetThuc
        End Get
        Set(ByVal value As String)
            sLyDoKetThuc = value
        End Set
    End Property

    Public Property LoaiHopDong() As Integer
        Get
            Return iLoaiHopDong
        End Get
        Set(ByVal value As Integer)
            iLoaiHopDong = value
        End Set
    End Property

End Class
